home *** CD-ROM | disk | FTP | other *** search
/ Macromedia Multimedia Showcase 5.1 / Macromedia - Multimedia Showcase 5.1 (Macromedia) (1996).ISO / pc / media / 20000.dir / 00213_Script_213 < prev    next >
Text File  |  1996-03-27  |  1KB  |  40 lines
  1. -- local scripts for 200000.dir
  2.  
  3. on checkHeadRollover
  4.   set headSpriteList = [8,9,10,11,12,18,19,20]
  5.   set headChan = 7
  6.   set gotRoll = FALSE
  7.   repeat with i in headSpriteList
  8.     if rollover(i) then
  9.       startRollover(headChan)
  10.       -- These are the names of cast numbers for the names of the MM bigwigs
  11.       set headCastList = ["BudColligan name", "JimVonEhr name", "JimFunk name", "JoeDunn name", "MilesWalsh name", "RandyUbillos name", "rickWood name", "SusanGordon name"]
  12.       set whichNum = getOne(headSpriteList, i)
  13.       set whichCast = getAt(headCastList,whichNum)
  14.       set the castNum of sprite headChan = the number of cast whichCast
  15.       set gotRoll = TRUE
  16.       exit repeat
  17.     end if
  18.   end repeat
  19.   if not gotRoll then
  20.     -- Reset to cast 201 (HARDCODED!) "Roll over to see names" cast
  21.     set defaultCast = the number of cast "03 roll"
  22.     set curCast = the castNum of sprite headChan
  23.     if curCast <> defaultCast then
  24.       set the castNum of sprite headChan = defaultCast
  25.     end if
  26.   end if
  27.   updateStage
  28. end checkHeadRollover
  29.  
  30. on startRollover theChan
  31.   if the puppet of sprite theChan = FALSE then
  32.     puppetsprite theChan, TRUE
  33.     global gNavObj
  34.     add(the exitQue of gNavObj, ("endRoll " & theChan))
  35.   end if
  36. end startRollover
  37.  
  38. on endRoll theChan
  39.   puppetsprite theChan, FALSE
  40. end endRoll